home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / axpanel / form2.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1998-07-02  |  2.5 KB  |  78 lines
  1. VERSION 5.00
  2. Object = "{26E5C4ED-10D0-11D2-BF5B-00A024982E5B}#3.0#0"; "axpanel.ocx"
  3. Begin VB.Form Form2 
  4.    Caption         =   "Form2"
  5.    ClientHeight    =   3195
  6.    ClientLeft      =   60
  7.    ClientTop       =   345
  8.    ClientWidth     =   4680
  9.    LinkTopic       =   "Form2"
  10.    ScaleHeight     =   3195
  11.    ScaleWidth      =   4680
  12.    StartUpPosition =   3  'Windows Default
  13.    Begin axPanelControl.axPanel axPanel2 
  14.       Height          =   330
  15.       Left            =   720
  16.       Top             =   2160
  17.       Width           =   2985
  18.       _ExtentX        =   5265
  19.       _ExtentY        =   582
  20.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  21.          Name            =   "MS Sans Serif"
  22.          Size            =   8.25
  23.          Charset         =   0
  24.          Weight          =   400
  25.          Underline       =   0   'False
  26.          Italic          =   0   'False
  27.          Strikethrough   =   0   'False
  28.       EndProperty
  29.       Text            =   "axPanel"
  30.       TextAlignment   =   4
  31.       FloodShowPct    =   -1  'True
  32.       FloodType       =   1
  33.       FloodPercent    =   10
  34.    End
  35.    Begin axPanelControl.axPanel axPanel1 
  36.       Height          =   375
  37.       Left            =   495
  38.       Top             =   1485
  39.       Width           =   3390
  40.       _ExtentX        =   5980
  41.       _ExtentY        =   661
  42.       BorderStyle     =   4
  43.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  44.          Name            =   "MS Sans Serif"
  45.          Size            =   8.25
  46.          Charset         =   0
  47.          Weight          =   400
  48.          Underline       =   0   'False
  49.          Italic          =   0   'False
  50.          Strikethrough   =   0   'False
  51.       EndProperty
  52.       Text            =   "axPanel"
  53.       TextAlignment   =   4
  54.       FloodShowPct    =   -1  'True
  55.       FloodType       =   5
  56.       FloodPercent    =   10
  57.       FloodColor      =   -2147483635
  58.       FloodColorInactive=   14737632
  59.    End
  60.    Begin VB.HScrollBar HScroll1 
  61.       Height          =   285
  62.       LargeChange     =   10
  63.       Left            =   810
  64.       Max             =   100
  65.       TabIndex        =   0
  66.       Top             =   585
  67.       Width           =   3030
  68.    End
  69. Attribute VB_Name = "Form2"
  70. Attribute VB_GlobalNameSpace = False
  71. Attribute VB_Creatable = False
  72. Attribute VB_PredeclaredId = True
  73. Attribute VB_Exposed = False
  74. Private Sub HScroll1_Change()
  75.   axPanel1.FloodPercent = HScroll1.Value
  76.   axPanel2.FloodPercent = HScroll1.Value
  77. End Sub
  78.